home *** CD-ROM | disk | FTP | other *** search
- inherited DownloadUpdateDialog: TDownloadUpdateDialog
- Left = 652
- Top = 366
- BorderIcons = [biSystemMenu, biMinimize]
- BorderStyle = bsSingle
- Caption = '%'
- ClientHeight = 134
- ClientWidth = 431
- OnClose = FormClose
- OnCloseQuery = FormCloseQuery
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object LocationLbl: TUiLabel
- Left = 8
- Top = 112
- Width = 249
- Height = 13
- AutoSize = False
- Caption = '%'
- FontColor = cl3DDkShadow
- end
- object PageControl: TUiPageControl
- Left = 0
- Top = 0
- Width = 431
- Height = 89
- ActivePage = tsDownloading
- Align = alTop
- Style = tsFlatButtons
- TabOrder = 0
- TabStop = False
- object tsDownloading: TUiTabSheet
- TabVisible = False
- object DownloadingImage: TUiImage
- Left = 16
- Top = 24
- Width = 32
- Height = 32
- AutoSize = True
- Picture.Data = {<image000.bmp>}
- Transparent = True
- end
- object DownloadingLbl: TUiLabel
- Left = 64
- Top = 24
- Height = 13
- Caption = 'Downloading...'
- end
- object ProgressLbl: TUiLabel
- Left = 401
- Top = 24
- Width = 8
- Height = 13
- Alignment = taRightJustify
- Caption = '%'
- end
- object RateLbl: TUiLabel
- Left = 64
- Top = 64
- Height = 13
- Caption = '%'
- end
- object RemainingLbl: TUiLabel
- Left = 401
- Top = 64
- Width = 8
- Height = 13
- Alignment = taRightJustify
- Caption = '%'
- end
- object DownloadingProgressBar: TUiProgressBar
- Left = 64
- Top = 40
- Width = 345
- Height = 17
- Max = 2800000
- TabOrder = 0
- end
- end
- object tsConfirm: TUiTabSheet
- TabVisible = False
- object WarningImage: TUiImage
- Left = 16
- Top = 24
- Width = 32
- Height = 32
- end
- object WarningLbl: TUiLabel
- Left = 64
- Top = 24
- Width = 313
- Height = 49
- AutoSize = False
- Caption =
- 'Clicking "Install" will close all Beyond Compare windows and run' +
- ' the downloaded file. Save your work first!'
- WordWrap = True
- end
- end
- object tsError: TUiTabSheet
- TabVisible = False
- object ErrorImage: TUiImage
- Left = 16
- Top = 24
- Width = 32
- Height = 32
- end
- object ErrorLbl: TUiLabel
- Left = 64
- Top = 24
- Height = 13
- Caption = 'Error downloading file.'
- end
- end
- object tsToDesktop: TUiTabSheet
- TabVisible = False
- object ToDesktopImage: TUiImage
- Left = 16
- Top = 24
- Width = 32
- Height = 32
- end
- object ToDesktopLbl: TUiLabel
- Left = 64
- Top = 24
- Width = 313
- Height = 41
- AutoSize = False
- Caption =
- 'Download complete. To install, close all Beyond Compare windows' +
- ' and run the setup program on your desktop.'
- WordWrap = True
- end
- end
- end
- object InstallBtn: TUiButton
- Left = 272
- Top = 104
- Caption = 'Install'
- TabOrder = 1
- OnClick = InstallClick
- AutoSize = asRight
- end
- object CancelBtn: TUiButton
- Left = 352
- Top = 104
- Cancel = True
- Caption = 'Cancel'
- TabOrder = 2
- OnClick = CancelClick
- AutoSize = asRight
- end
- object Timer: TTimer
- Enabled = False
- OnTimer = TimerTimer
- end
- end
-